home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Top 200 Programs
/
Top 200 Programs.iso
/
Bob8
/
TESTWARE
/
SUPER6
/
SUPER6.ZIP
/
SHOW.SPT
< prev
next >
Wrap
Text File
|
1996-05-12
|
26KB
|
1,224 lines
vga16
BLASTER ON
If NOEMS Then GOTO :MSG1
GOTO :BEGIN
:BUTDRAW
FONT ROM16
STYLE NORMAL
COLOR 0,13
SHOW @ 590,440 BUTOFF.PCX 1
PRINT @ 598,448 "OK"
MOUSE AT 614,454
MOUSE ON
RETURN
:BUTPRESS
KEYCOLOR 13
MOUSE OFF
PUT @ 590,440 BUTON.PCX
WAIT .1
PUT @ 590,440 BUTOFF.PCX
RETURN
:BEGIN
FONT TIMES36.FNT
STYLE BOLD
STYLE OVERLAY
COLOR 15,0
SHOW @ 0,0 CURTAIN.PCX 33
WAIT .5
XPlay PRESENTS.MUS
SHOW @ 0,0 CURT1.PCX 20
Flash 0,4,15,10
SHOW @ 0,0 CURT2.PCX 1
SOUND 10
KillXP
PIXNUM 8,8
FONT TIMES24.FNT
Logo At 90,245
Color 0,3
Logo2 15,"Multimedia Authoring Software"
FONT ROM16
style normal
style overlay
COLOR 14,0
TFloat 616,285,170,285,8,2,"(C) Copyright 1989-1995, PC West, Inc."
TxOthr :TOPSY
MouseIn1 107,216,147,256 :LAB1
MouseIn2 207,216,247,256 :LAB2
MouseIn3 305,216,345,256 :LAB3
MouseIn4 408,216,448,256 :LAB4
MouseIn5 499,216,539,256 :LAB5
MouseIn6 107,318,147,358 :LAB6
MouseIn7 207,318,247,358 :LAB7
MouseIn8 305,318,345,358 :LAB8
MouseIn9 408,318,448,358 :LAB9
MouseIn0 499,318,539,358 :EXIT
MouseIn11 547,167,565,185 :LAB11
MouseIn12 70,166,100,196 :LAB12
MouseIn13 602,0,639,18 :LAB13
MouseIn14 0,0,18,19 :LAB12
WAIT 1
SHOW @ 0,0 CONTENT.PCX 22
mouse at 320,290
'EscKey Off
:TOP
KEYCOLOR 13
Mouse on
INPUT 3
IF 1 GOTO :LAB1
IF 2 GOTO :LAB2
IF 3 GOTO :LAB3
IF 4 GOTO :LAB4
IF 5 GOTO :LAB5
IF 6 GOTO :LAB6
IF 7 GOTO :LAB7
IF 8 GOTO :LAB8
IF 9 GOTO :LAB9
IF 0 GOTO :EXIT
Show @ 309,220 frog2.pcx 1
wait .2
Show @ 309,220 frog1.pcx 1
GOTO :TOP
:LAB1
Mouse off
put @ 107,216 menbuton.pcx
WAIT .05
put @ 107,216 MENbutof.pcx
GOTO :MLAB1
:LAB2
Mouse off
put @ 207,216 menbuton.pcx
WAIT .05
put @ 207,216 menbutof.pcx
GOTO :MLAB2
:LAB3
Mouse off
put @ 305,216 menbuton.pcx
put @ 305,216 menbutof.pcx
GOTO :MLAB3
:LAB4
Mouse off
put @ 408,216 menbuton.pcx
WAIT .05
put @ 408,216 menbutof.pcx
GOTO :MLAB4
:LAB5
Mouse off
put @ 499,216 menbuton.pcx
WAIT .05
put @ 499,216 menbutof.pcx
GOTO :MLAB5
:LAB6
Mouse off
put @ 107,318 menbuton.pcx
WAIT .05
put @ 107,318 menbutof.pcx
GOTO :MLAB6
:LAB7
Mouse off
put @ 207,318 menbuton.pcx
WAIT .05
put @ 207,318 menbutof.pcx
GOTO :MLAB7
:LAB8
Mouse off
put @ 305,318 menbuton.pcx
WAIT .05
put @ 305,318 menbutof.pcx
GOTO :MLAB8
:LAB9
Mouse Off
put @ 408,318 menbuton.pcx
WAIT .05
put @ 408,318 menbutof.pcx
GOTO :MLAB9
:LAB12
MOUSE OFF
SHOW @ 70,166 CLICK1.PCX 1
GOTO :MLAB12
:LAB11
MOUSE OFF
COLOR 0,0
BOX 548,168,564,168
BOX 548,168,548,186
COLOR 15,15
BOX 548,186,565,186
BOX 565,168,565,186
WAIT .1
COLOR 15,15
BOX 548,168,564,168
BOX 548,168,548,186
COLOR 0,0
BOX 548,186,565,186
BOX 565,168,565,186
SHOW @ 0,0 FROG3.PCX 1
GOTO :MLAB11
:LAB13
MOUSE OFF
COLOR 0,0
BOX 601,0,638,0
BOX 601,0,601,19
COLOR 15,15
BOX 601,19,639,19
BOX 639,0,639,19
WAIT .1
COLOR 15,15
BOX 602,0,639,0
BOX 602,0,602,19
COLOR 0,0
BOX 602,19,639,19
BOX 639,0,639,19
SHOW @ 0,0 FROG3.PCX 1
GOTO :MLAB11
:EXIT
KEYCOLOR 13
Mouse off
put @ 499,318 menbuton.pcx
WAIT .05
put @ 499,318 menbutof.pcx
KEYCOLOR 0
Set Animate1
PEN.PCX
End Set
Pixnum 14,14
GOTO :BYE
:MLAB1
CLR 1,3,0,150,639,479
CLR 0,2,0,0,639,149
GOSUB :BUTDRAW
color 0,0
CIRCLE 103,105,98,100
COLOR 4,5
Fill bigdot
CIRCLE 115,100,100,95
FONT HEAD4.FNT
SHADOW 3,3,0
STYLE SHADOW
COLOR 14
PRINT @ 68,48 "Easy"
PRINT @ 40,98 "To Use!"
logo at 245,20
color 3,1
logo 15,"ShowPrep 6"
color 6,1
print @ 260,160 "Script Commands"
font rom16
COLOR 15,1
print @ 50,220 "You create your show using simple script commands. For example, if"
print @50,240 "you want to show a pcx image you would use the "SHOW" command. The"
print @ 50,260 "commands are written and saved as a script in the ASCII text"
print @ 50,280 "format. And, you may create and run your show in both DOS and Windows."
print @ 50,310 "Preparing your script file is a breeze with our"
color 14,1
print @435,310 "'ShowPrep 6'"
color 15,1
print @ 50,330 "a utility program that is part of your SuperShow software package"
print @ 50,350 "ShowPrep is not only a text editor, but it contains all of the script"
print @ 50,370 "commands on pull-down menu's. Just choose the command from the menu"
print @ 50,390 "and the command is automatically inserted in your script."
fill solid
COLOR 0,0
BOX 100,432,535,454
color 14,4
BOX 106,440,543,459
color 15,4
style normal
PRINT @ 159,443 "Click or press key for more on SuperShow 6."
pause
GOSUB :BUTPRESS
CLR 0,2,0,0,639,134
FONT ARIAL40.FNT
style SHADOW
SHADOW 3,3,6
Color 15
PRINT @ 251,34 "SuperShow 6"
CLR 5,3,0,135,639,479
color 0,13
STYLE NORMAL
GOSUB :BUTDRAW
color 0,0
CIRCLE 103,105,88,100
COLOR 3,1
Fill bigdot
CIRCLE 115,100,90,95
FONT HEAD4.FNT
STYLE SHADOW
SHADOW 3,3,0
COLOR 14,1
PRINT @ 57,50 "How it"
PRINT @ 52,100 "is used!"
print @ 230,145 "Multiple Applications"
FONT ROM16
COLOR 15,1
print @ 40,210 "From sole proprietor's to major companies such as AT & T, Walt Disney"
print @40,230 "World, Hewlett Packard, and Compaq,"
color 14,4
print @ 341,230 "SuperShow"
color 15,4
print @ 426,230 "is being used in a"
print @ 40,250 "wide variety of ways for multiple purposes. With our counting"
print @ 40,270 "and scoring features, it is used by several U.S. Government agencies"
print @ 40,290 "and by hundreds of schools, colleges and university's around the world"
color 14,4
print @ 40,320 "SuperShow"
color 15,4
print @ 120,320 "is used to create the GEnie Online LIVEWIRE magazine for both"
print @ 40,340 "DOS and Windows; by commercial retailers like The Gap, H.J. Heinz"
print @ 40,360 "and General Elevator. Software Developers, commercial banks, insurance"
print @ 40,380 "companies, real estate firms, lawyers, hospitals, design houses. . ."
print @ 40,400 "these are just a few of the types of people creating presentations"
print @ 40,420 "with the SuperShow Multimedia Authoring package."
fill solid
COLOR 0,0
BOX 100,447,535,469
color 14,1
BOX 106,455,543,474
color 15,1
style normal
PRINT @ 159,458 "Click or press a key for more SuperShow 6."
pause
GOSUB :BUTPRESS
pixnum 6,6
CLR 5,22,30,210,621,480
clr 0,17,70,230,571,435
color 15,0
box 70,230,571,435
box 73,233,568,432
color 15
print @ 93,250 "Here are just a few of the types of applications being"
print @ 93,270 "created with SuperShow multimedia presentation software:"
delay 3
Textfade 8
pixnum 1,1
color 6
print @ 100,310 "■ Sales Presentations"
color 14
delay 1
print @ 100,330 "■ Product Catalogs"
color 9
delay 1
print @ 100,350 "■ Employee Training"
color 6
delay 1
print @ 100,370 "■ Software Demonstration"
color 14
delay 1
print @ 100,390 "■ Interactive Testing"
color 9
delay 1
print @ 320,310 "■ Electronic Magazines"
color 6
delay 1
print @ 320,330 "■ Software Prototyping"
color 14
delay 1
print @ 320,350 "■ Educational Learning Tool"
color 9
delay 1
print @ 320,370 "■ Photo & Drawing Displays"
color 6
delay 1
print @ 320,390 "■ Product Tutorials"
delay 3
textfade 0
pixnum 28,18
SHOW @ 0,0 PCW.PCX 16
GOSUB :BUTDRAW
color 15,1
Print @ 95,460 "Press any key to continue"
pause
GOSUB :BUTPRESS
SHOW @ 0,0 CONTENT.PCX 1
GOTO :TOP
:MLAB2
CLR 0,5,0,0,639,479
pixnum 8,48
SHOW @ 0,0 PICFRAME.PCX 42
pixnum 8,8
FONT ROM16
STYLE NORMAL
STYLE OVERLAY
COLOR 0,0
BOX 178,438,222,472
COLOR 11,11
BOX 180,440,220,470
COLOR 15,15
BOX 180,441,220,441
BOX 180,440,180,470
COLOR 5,5
BOX 182,470,220,470
BOX 219,442,219,468
color 0,11
PRINT @ 192,448 "OK"
SHOW @67,184 ART1.PCX 2
STYLE SHADOW
COLOR 15,4
Print @ 412,200 "SuperShow 6.0 features"
Print @ 412,220 "hundreds of screen effect"
Print @ 412,240 "fades and transitions."
Print @ 412,280 "Creating these fades and"
Print @ 412,300 "effects is as easy as"
Print @ 412,320 "choosing an image file"
Print @ 412,340 "and fade effect from a"
Print @ 412,360 "drop-down menu and then"
Print @ 412,380 "pressing the Enter key."
Color 12,9
Print @ 280,450 "< Click or press a key to continue >"
Mouse At 210,450
Mouse On
PixNum 4,4
pause
Mouse Off
COLOR 11,11
BOX 180,440,220,470
COLOR 5,5
BOX 180,441,220,441
BOX 180,440,180,470
COLOR 15,15
BOX 182,470,220,470
BOX 219,442,219,468
color 0,11
STYLE NORMAL
PRINT @ 193,449 "OK"
WAIT .2
COLOR 4,4
BOX 178,438,639,479
SHOW @67,184 TIG.PCX 6
Delay 1
SHOW ART1.PCX 9
Delay 1
SHOW TIG.PCX 10
Delay 1
SHOW ART1.PCX 15
Delay 1
SHOW TIG.PCX 16
Delay 1
SHOW ART1.PCX 17
Delay 1
SHOW TIG.PCX 18
Delay 1
SHOW ART1.PCX 19
Delay 1
SHOW TIG.PCX 20
Delay 1
SHOW ART1.PCX 21
Delay 1
PixNum 318,2
SHOW TIG.PCX 24
Delay 1
SHOW ART1.PCX 26
Delay 1
PixNum 2,2
SHOW TIG.PCX 27
Delay 1
SHOW ART1.PCX 28
Delay 1
PixNum 40,5
SHOW TIG.PCX 30
Delay 1
PixNum 2,12
SHOW ART1.PCX 16
Delay 1
PixNum 8,8
FxDelay 5
SHOW TOM.PCX 18
Delay 1
FxDelay 0
SHOW TOM.PCX 35
CLR 0,0,0,0,639,479
SHOW @ 0,0 CONTENT.PCX 20
GOTO :TOP
:MLAB3
KEYCOLOR 12
Set Animate1
FROG1.PCX
FROG2.PCX
End Set
COLOR 12,12
BOX 309,222,340,251
FXDELAY 100
Animate1 308,220,640,480,8,0
KILL ANIMATE
FXDELAY 0
KEYCOLOR 0
SET ANIMATE1
BFLY1.PCX
BFLY2.PCX
END SET
FONT ARIAL40.FNT
Logo At 10,160
color 1,9
mouse off
CLR 0,19,0,0,639,479
pal desr.pcx
Logo2 15,"SuperShow Animation"
FONT ROM16
style normal
color 14,0
Textfade 8
print @ 90,30 "SuperShow brings your presentations to life with animation!"
FXDELAY 25
Textfade 0
ANIMATE1 0,480,265,110,7,0
ANIMATE1 265,110,265,110,3,2
Delay 1
ANIMATE1 265,110,265,110,7,2
color 11
PRINT @ 140,75 "Version 6 gives you FOUR choices of animation:"
wait 1
ANIMATE1 265,110,265,110,7,2
FONT TIMES24.FNT
style bold
color 12
ANIMATE1 265,110,265,110,7,2
TFloat 200,490,200,240,5,2,"Sprite Animation"
ANIMATE1 265,110,265,110,7,2
wait 1
color 14
TFloat 190,490,190,290,5,2,"Floating Animation"
ANIMATE1 265,110,265,110,7,2
wait 1
color 10
TFloat 210,490,210,340,5,2,"Page Animation"
ANIMATE1 265,110,265,110,7,2
wait 1
color 11
TFloat 130,490,130,390,5,2,".FLI & .FLC File Animation"
ANIMATE1 265,110,620,-20,7,0
WAIT 2
FONT SYSTEM15.FNT
style normal
Style Overlay
Color 0
FXDelay 0
KILL ANIMATE
pixnum 8,48
SHOW @ 0,0 DESR.PCX 42
PRINT @ 20,60 "WHEN WALKING IN THE DESERT. . . "
pixnum 8,8
WAIT 1
SET ANIMATE1
M1.PCX
M2.PCX
M3.PCX
M4.PCX
M5.PCX
M6.PCX
M7.PCX
END SET
SET ANIMATE 2
MA2.PCX
MA3.PCX
MA1.PCX
MA4.PCX
END SET
FXDELAY 15
ANIMATE1 -30,310,440,265,7,0
FXDELAY 70
ANIMATE2 410,350,15,430,7,0
Put @ 5,440 ma2.pcx
KILL ANIMATE
Color 15
PRINT @ 262,170 "WATCH OUT FOR THE CACTUS! "
fxdelay 0
DELAY 1
PFLOAT 5,440,220,-40,2,0, GHOST.PCX
DELAY 2
CLR 0,21,0,0,639,479
KILL ANIMATE
VGA320
FLIC DOHC.FLI /R4 /G
COLOR 3,1
PRINT @ 10,120 "SUPERSHOW"
PRINT @ 10,140 "ANIMATION"
COLOR 1,1
PRINT @ 225,128 "FLI & FLC"
DELAY 4
CLR 0,18,0,0,639,479
VGA16
PIXNUM 8,8
SHOW @0,0 CONTENT.PCX 1
GOTO :TOP
:MLAB4
pixnum 8,8
CLR 0,4,0,0,639,120
CLR 0,5,0,120,639,240
CLR 0,4,0,240,639,360
CLR 0,5,0,360,639,480
pal dazl2.pcx
KALID 7247
KALID 2481
KALID 2118
Mouse Set Arrow,15
PIXNUM 6,8
FONT HEAD4.FNT
STYLE NORMAL
color 15,0
Textfade 27
SHOW @ 76,112 DAZL2.PCX 17
PIXNUM 2,2
print @ 120,160 "Dazzle your clients &"
print @ 120,220 "friends when you use"
COLOR 12
style bold
Textfade 7
print @ 213,282 "SUPERSHOW"
DELAY 1
PIXNUM 6,8
TEXTFADE 0
flash 9,6,60,5
COLOR 15,4
SHOW @ 0,0 DAZL1.PCX 18
CLR 4,2,100,137,537,342
SHADOW 3,3,0
STYLE SHADOW
PRINT @ 120,160 "Hundreds of special"
PRINT @ 120,220 "effects & transitions"
PRINT @ 120,280 "to enhance your show."
pixnum 60,1
SHOW @ 100,32 SMOK.PCX 26
SHOW @ 349,370 MIRROR.PCX 25
delay 2
color 12,4
Logo At 150,190
pixnum 8,8
CLR 1,16,100,137,537,342
Logo 14,"Logo Effects"
delay 1.5
Color 2,0
logo at 160,200
CLR 0,20,100,137,537,342
logo2 10,"Super Effects!"
color 1,0
Logo At 190,250
logo1 11,"Your Name Here"
delay 1.5
FONT TIMES36.FNT
CLR 1,22,100,137,537,342
STYLE SHADOW
SHADOW 3,3,0
COLOR 15
PRINT @ 210,220 "SHAKE IT!"
WAIT .5
SHAKE 20
WAIT .5
FONT ROM16
COLOR 14,0
PRINT @ 260,155 "Make It Flashy!"
flash 9,6,30,5
type @ 210,185 "Use the SuperShow Typewriter"
crwlat 101,300,536,15
Pixnum 44,40
STYLE NORMAL
COLOR 11,1
crawl "Or. . . crawl your message across the screen. . ."
CLR 0,16,0,0,639,479
PAL ST.PCX
FONT ROM16
COLOR 15,0
KALID 11999
KALID 936
kalid 778
CIRCLE 321,236,107,45
Explode @ 0,0 ST.PCX 2
Delay 2
kalid 2224
kalid 976
KALID 1024
CIRCLE 321,236,107,45
PRINT @275,235 "Kaleidoscope"
Delay 2
CLR 0,5,0,0,639,479
KALID 888
KALID 32001
PRINT @290,235 "Patterns"
DELAY 1
CLR 0,4,0,0,639,479
KALID 220
KALID 6669
CIRCLE 321,236,104,42
PRINT @290,235 "Super FX"
pixnum 8,8
DELAY 2
CLR 0,17,0,0,639,479
FxDelay 0
SHOW @ 0,0 CONTENT.PCX 1
GOTO :TOP
:MLAB5
pixnum 24,12
SHOW @ 0,0 PCWEST.pcx 16
FONT HEAD4.FNT
STYLE NORMAL
color 4,14
BLASTER ON
pixnum 1,1
Textfade 8
print @ 110,10 "SOUND"
Textfade 9
PRINT @300,10 "MUSIC"
TEXTFADE 25
PRINT @ 260,10 "&"
PIXNUM 8,8
TEXTFADE 0
font rom16
color 15,2
print @ 135,180 "SuperShow is a multimedia program featuring music,"
print @ 135,200 "midi sound and digitized voice from your PC or"
print @ 135,220 "external speakers. SuperShow can play sound files"
print @ 135,240 "compatible with the Sound Blaster card now including"
print @ 135,260 ".MID, .VOC and .CMF sound files. The size of these"
print @ 135,280 "files is limited only by memory and SuperShow will"
print @ 135,300 "play your sound files in the background."
color 0,9
STYLE NORMAL
print @ 330,448 "Click or press key for more >"
GOSUB :BUTDRAW
pause
GOSUB :BUTPRESS
color 2,2
BOX 116,161,558,341
color 14,2
print @ 135,200 "We've also created music/sound script commands"
print @ 135,220 "based on the Basic Music Lanuage. You may play"
print @ 135,240 "external music files or play music directly from"
print @ 135,260 "your script. Play the music in the background"
print @ 135,280 "while changing or printing words to the screen."
GOSUB :BUTDRAW
pause
GOSUB :BUTPRESS
color 9,9
box 304,425,626,470
color 2,2
BOX 116,161,558,341
color 15,2
PLAY mf O2 T70 mn
PRINT @ 200,240 "Oh when the Saints"
PLAY C16 E16 F16 ml G4 mn G16
PRINT " "
pal TIG.PCX
COLOR 15,2
PRINT "Go marching in,"
PLAY C16 E16 F16 ml G4 mn G16
PRINT " "
PAL PAL16.PCX
PRINT "Oh when the Saints go marching in,"
PLAY C16 E16 F16 G8 E8 C8 E8 ml D4 mn D8
PRINT " "
PAL pcwest.PCX
COLOR 14,2
PRINT "Lord, how I want to be in that number"
PLAY E16 E16 D16 C8. C16 E8 G16 G16 G16 ml F8. mn F8
PRINT " "
pal TIG.PCX
COLOR 15,2
PRINT "When the Saints go marching in."
PLAY E16 F16 G8 E8 D8 D8 ml C4 mn C8
PRINT " "
pal pcwest.pcx
color 15,2
print @ 135,200 "For more details and examples of all the new"
print @ 135,220 "sound features in SuperShow 6, see the tutorial"
print @ 135,240 "scripts SOUND1.SPT and SOUND2.SPT. Also, refer"
print @ 135,260 "to the chapter titled "Sound" in the printed"
print @ 135,280 "manual."
color 0,9
print @ 330,448 "SOUND & MUSIC FROM SUPERSHOW!"
GOSUB :BUTDRAW
sound 10
pause
GOSUB :BUTPRESS
SHOW @ 0,0 CONTENT.PCX 28
GOTO :TOP
:MLAB6
CLR 0,5,0,0,639,479
MouseSC0 286,422,343,449
MouseSC1 16,422,74,449
MouseSC2 83,422,140,449
MouseSC3 150,422,207,449
MouseSC4 218,422,275,449
MouseSC5 421,422,478,449
MouseSC6 489,422,546,449
MouseSC7 556,422,614,449
MouseSC8 353,422,410,449
:PLAB6
keycolor 7
MOUSE OFF
SHOW @ 0,0 PUBTXBOX.PCX 1
TXPREV :TOPSY
PIXNUM 8,8
FONT ROM16
STYLE NORMAL
color 15,1
mouse on
Mouse At 40,450
SCROLL 68,90,570,408,SCROLL.TXT
Mouse Off
TXPREV :PLAB6
SHOW @ 100,100 MINITXBO.PCX 17
FONT SYSTEM15.FNT
color 15,4
put @ 489,422 OFFBUT6.PCX
Mouse At 40,450
mouse on
SCROLL 123,123,393,360,miniscrl.TXT
:TOPSY
MOUSE OFF
CLR 0,4,0,0,639,479
SHOW @ 0,0 CONTENT.PCX 1
GOTO :TOP
:MLAB7
font HEAD4.FNT
STYLE NORMAL
style overlay
color 0,14
SHOW @ 0,0 PCWEST.pcx 27
TEXTFADE 8
PIXNUM 1,1
print @70,10 "FONTS AND TEXT"
TEXTFADE 0
PIXNUM 8,8
FONT ROM16
style normal
COLOR 15
SHADOW 3,3,0
STYLE SHADOW
Print @ 130,180 "SuperShow 6 uses the GEM font format. The custom"
print @ 130,205 "fonts may be rotated, made bold, underlined or made"
print @ 130,230 "transparent. And since this is a standard format,"
print @ 130,255 "you may create your own custom fonts using programs"
print @ 130,280 "like 'More Fonts'. You may also purchase additional"
print @ 130,305 "font disks from PC West."
STYLE NORMAL
COLOR 14,4
Rotate 90
print @70,460 "R O T A T E"
FONT ROM16
Rotate 270
color 14,5
print @270,370 "R O T A T E"
FONT ROM16
STYLE NORMAL
COLOR 14,0
PRINT @99,370 " Normal Font "
STYLE OVERLAY
PRINT @ 99,390 "Transparent Font"
Style Bold
color 15
print @ 99,410 "B O L D F O N T"
STYLE NORMAL
STYLE OVERLAY
Style Underline
color 0
PRINT @99,430 " Underline Font "
style normal
COLOR 14,1
STYLE SHADOW
PRINT @ 99,450 " Shadowed Font "
color 0,9
style normal
print @ 330,448 "Click or press key for more >"
GOSUB :BUTDRAW
pause
GOSUB :BUTPRESS
Textfade 9
color 14,2
CLR 2,3,115,162,540,339
pixnum 1,1
style shadow
print @180,200 "And with version 6, you now may"
Textfade 8
print @180,230 "display your text using any of the"
Textfade 27
print @180,260 "more than 2 dozen special effects"
Textfade 16
print @ 180,290 "and transitions."
MOUSE ON
TEXTFADE 0
pixnum 8,8
pause
GOSUB :BUTPRESS
SHOW @ 0,0 FONT.PCX 5
GOSUB :BUTDRAW
pause
GOSUB :BUTPRESS
font rom16
COLOR 0,15
CLR 0,3,0,0,639,479
SHOW @ 0,0 USER.PCX 1
$Size 25
Sound 1
Get @ 290,298 $1
$Size 25
Get @ 290,325 $2
$Size 30
Get @ 290,357 $3
$Size 3
Get @ 290,385 $4
COLOR 0
box 170,135,449,460
COLOR 15,15
box 180,120,455,449
COLOR 0,15
DATE @ 340,150
$PRINT @ 194,180 $1
$PRINT @ 194,195 $2
$PRINT @ 194,210 $3
print @ 194,245 "Dear ....................."
$PRINT @ 234,245 $1
print @ 194,265 "Thank you for your order of"
$PRINT @ 416,265 $4
print @ 194,285 "copies of SuperShow 6. We"
print @ 194,305 "will send them priority mail"
print @ 194,325 "to"
$PRINT @ 218,325 $2
print @ 194,345 "tomorrow morning!"
print @ 275,370 "Sincerely,"
print @ 300,395 "PC West, Inc."
color 2,8
crwlat 449,449,630,45
crawl "Press a key to continue. . ."
$0 = "SAVEFILE.TXT"
Save $0
SHOW @ 0,0 USER.PCX 1
color 0,0
BOX 156,156,458,423
color 15,1
BOX 166,166,468,433
print @ 184,206 "We saved the information you"
print @ 184,226 "entered to a text file named"
print @ 184,246 "Savefile.txt. You may access"
print @ 184,266 "this file later for redisplaying"
print @ 184,286 "the information."
print @ 184,326 "Please see this script for more"
print @184,346 "detail on saving information that"
print @ 184,366 "is entered by a user."
color 0,15
delay 15
SHOW @ 0,0 USER.PCX 1
$SIZE 23
Read TEST.TXT
color 0,0
BOX 156,156,458,423
color 15,1
BOX 166,166,468,433
print @ 184,206 "You may use an external text"
print @ 184,226 "file to read in information to"
print @ 184,246 "to be displayed at any time, in"
print @ 184,266 "any font style, color, at any"
print @ 184,286 "location on your screen."
print @ 184,326 "Press a key to see how the READ"
print @184,346 "script command works reading the"
print @ 184,366 "file 'TEST.TXT' to input text to"
print @ 184,386 "your presentation."
color 0,15
delay 10
SHOW @ 0,0 USER.PCX 1
$type @ 290,298 $1
$Type @ 290,325 $2
$Type @ 290,357 $3
$Type @ 290,385 $4
delay 2
COLOR 0
box 170,135,449,460
COLOR 15,15
box 180,120,455,449
COLOR 0,15
DATE @ 340,150
$PRINT @ 194,180 $1
$PRINT @ 194,195 $2
$PRINT @ 194,210 $3
print @ 194,245 "Dear ....................."
$PRINT @ 234,245 $1
print @ 194,265 "Thank you for your order of"
$PRINT @ 416,265 $4
print @ 194,285 "copies of SuperShow 6. We"
print @ 194,305 "will send them priority mail"
print @ 194,325 "to"
$PRINT @ 218,325 $2
print @ 194,345 "tomorrow morning!"
print @ 275,370 "Sincerely,"
print @ 300,395 "PC West, Inc."
color 2,8
crwlat 449,449,630,45
crawl "Press a key to continue. . ."
CLR 0,18,0,0,639,479
SHOW @ 0,0 CONTENT.PCX 17
GOTO :TOP
:MLAB8
keycolor 7
MouseSC4 286,422,343,449
MouseSC1 83,422,140,449
MouseSC2 150,422,207,449
MouseSC3 218,422,275,449
MouseSC8 421,422,478,449
MouseSC6 489,422,546,449
MouseSC0 353,422,410,449
MouseSC5 0,0,0,0
MouseSC7 0,0,0,0
CLR 0,4,0,0,639,240
CLR 0,5,0,240,639,479
pixnum 8,48
SHOW @ 0,0 TOOLS.PCX 42
TXPREV :TOPSY2
FONT ROM16
STYLE NORMAL
color 0,15
mouse on
Mouse At 40,450
SCROLL 176,130,470,370,TOOLS.TXT
:TOPSY2
Mouse Off
PIXNUM 8,8
put @ 489,422 OFFBUT6.PCX
CLR 0,4,0,240,639,479
CLR 0,5,0,0,639,240
pixnum 24,8
SHOW @ 0,0 CONTENT.PCX 31
PIXNUM 8,8
GOTO :TOP
:MLAB9
SHOW @ 0,0 MARQ.PCX 20
FONT ROM16
style normal
style overlay
COLOR 15
Print @ 50,100 "Today is:"
DATE @ 130,100
color 14
Print @ 10,120 "European Date:"
EDATE @ 130,120
color 15
Print @ 50,140 "Time is:"
Time2 @ 130,140 1
FLASH 7,3,30,15
gosub :BUTDRAW
pause
GOSUB :BUTPRESS
color 14,0
CLR 0,22,0,280,639,479
flash 4,3,21,5
box 40,280,610,479
box 42,282,609,477
box 319,282,321,477
Textfade 8
pixnum 1,1
color 6
print @ 43,300 " ■ Full Publishing Abilities"
delay 1
color 14
print @ 43,320 " ■ Counting & Scoring"
delay 1
color 9
print @ 43,340 " ■ Conditional Branching"
delay 1
color 15
print @ 43,360 " ■ Controlled Variable Branching"
delay 1
color 6
print @ 43,380 " ■ Import & Scroll Text Files"
delay 1
color 14
print @ 43,400 " ■ Hundreds of Screen Fades"
delay 1
color 9
print @ 43,420 " ■ User Text Input"
delay 1
color 15
print @ 43,440 " ■ 16.7M Color Image Display"
delay 1
color 6
print @322,300 " ■ Display Date & Time "
delay 1
color 14
print @322,320 " ■ Background Music & Sound"
delay 1
color 9
print @322,340 " ■ Animation & Tiling Effects"
delay 1
color 15
print @322,360 " ■ Timed Input & Loop Commands"
delay 1
color 6
print @322,380" ■ Scaling & Exploding Effects"
delay 1
color 14
print @322,400 " ■ Dozens of Custom Screen Fonts"
delay 1
color 9
print @322,420 " ■ Supports .MID, .VOC, .CMF files"
delay 1
color 15
print @322,440 " ■ Kaleidoscope and much more"
textfade 0
pixnum 8,8
flash 1,3,21,10
SHOW @ 0,0 CONTENT.PCX 22
GOTO :TOP
:MLAB11
KEYCOLOR 12
Set Animate1
FROG1.PCX
FROG2.PCX
End Set
FXDELAY 100
Animate1 308,220,163,358,8,0
FXDELAY 20
DO LOOP
Animate1 163,358,163,325,8,0
Animate1 163,325,163,358,8,2
LOOP 3
KEYCOLOR 13
put @ 153,350 menbuton.pcx
WAIT .1
put @ 153,350 menbutof.pcx
FXDELAY 0
KEYCOLOR 0
KILL ANIMATE
SHOW @ 0,0 CONTENT.PCX 1
GOTO :TOP
:MLAB12
KEYCOLOR 13
Set Animate1
HAND1.PCX
End Set
Animate1 -228,-170,-98,40,10,2
WAIT .1
Animate1 -98,40,-98,40,2,0
SHOW @ 71,167 RESTORE.PCX 1
Animate1 -98,40,-228,-170,10,0
SHOW @ 0,0 CONTENT.PCX 1
KILL ANIMATE
GOTO :TOP
:BYE
CLR 0,27,0,0,639,479
SHOW @ 0,0 FINI.pcx 27
ANIMATE1 178,193,178,193,2,2
FONT Script2.FNT
STYLE NORMAL
Style Overlay
Delay 1
Color 0
ANIMATE1 178,193,70,98,2,2
ANIMATE1 70,98,90,128,4,2
Print @70,100 "R"
ANIMATE1 84,98,94,128,4,2
Print @84,100 "e"
ANIMATE1 96,98,106,128,4,2
Print @92,100 "m"
ANIMATE1 108,98,118,128,4,2
Print @104,100 "e"
ANIMATE1 120,98,130,128,4,2
Print @112,100 "m"
ANIMATE1 130,98,140,128,4,2
Print @124,100 "b"
ANIMATE1 140,98,150,128,4,2
Print @132,100 "e"
ANIMATE1 150,98,160,128,4,2
Print @140,100 "r"
ANIMATE1 70,131,82,161,4,2
Print @70,133 "T"
ANIMATE1 82,131,106,161,4,2
Print @82,133 "o"
ANIMATE1 106,131,120,161,4,2
Print @106,133 "O"
ANIMATE1 120,131,130,161,4,2
Print @120,133 "r"
ANIMATE1 130,131,140,161,4,2
Print @130,133 "d"
ANIMATE1 140,131,150,161,4,2
Print @140,133 "e"
ANIMATE1 150,131,160,161,4,2
Print @148,133 "r"
ANIMATE1 70,163,90,193,4,2
Print @70,165 "S"
ANIMATE1 84,163,94,193,4,2
Print @84,165 "u"
ANIMATE1 96,163,106,193,4,2
Print @96,165 "p"
ANIMATE1 108,163,118,193,4,2
Print @108,165 "e"
ANIMATE1 120,163,130,193,4,2
Print @116,165 "r"
ANIMATE1 132,163,142,193,4,2
Print @126,165 "S"
ANIMATE1 144,163,154,193,4,2
Print @140,165 "h"
ANIMATE1 156,163,166,193,4,2
Print @152,165 "o"
ANIMATE1 168,163,178,193,4,1
Print @162,165 "w"
Kill Animate
FONT SYSTEM15.FNT
COLOR 15
Delay 1
Explode @ -120,180 logo.PCX 5
Delay 1
PRINT @295,100 "To recieve your registered version of SuperShow 6"
PRINT @295,115 "send a check or money order for $89.95 plus $5.00"
PRINT @295,130 "for shipping and handling to:"
FXDELAY 3
PIXNUM 1,1
Delay 1
SHOW @ 330,160 FINI2.PCX 6
Color 0
Print @ 438,362 "Shipping & handling charges for"
Print @ 438,380 "orders in Canada and Mexico are"
Print @ 438,398 "$10.00. Shipping and handling for"
Print @ 438,415 "all other international orders is"
Print @438,432 "$15.00. All payments should be in"
Print @ 438,450 "U.S. funds drawn on a U.S. bank."
COLOR 14,1
Delay 5
Print @ 40,390 "For more information or for details on"
Print @ 40,408 "Federal Express overnight shipping call:"
FONT HELV28.FNT
Textfade 23
pixnum 4,4
fxdelay 0
Color 12,1
Print @ 47,440 "602-992-0310"
Textfade 0
color 14,1
PRINT @ 46,439 "602-992-0310"
Delay 8
PIXNUM 12,10
CLR 4,4,0,0,639,240
CLR 4,5,0,240,639,479
font HEAD4.FNT
style normal
style overlay
color 15
PRINT @120,0 "International Orders"
font rom16
textfade 0
color 8
print @ 20,60 "Internationally you may order the registered version of SuperShow from:"
print @60,100"TESTWARE Publishing"
print @78,120 "46 The Avenue"
print @20,140 "Harrogate, N. Yorkshire HG1 4QD"
print @78,160 "United Kingdom"
print @60,180 "Phone: 0423-886-415"
print @420,100 "CDV-Software"
print @390,120 "Neureuter Strasse 37B
print @415,140 "76185 Karlsruhe"
print @440,160 "Germany"
print @400,180 "Phone 0721/972240"
delay 6
SHOW @ 76,222 DAZL3.PCX 7
CLR 1,2,103,248,536,451
pixnum 1,1
SHOW @ 180,320 logo.PCX 27
delay 1
flash 9,6,60,5
show @ -180,-300 logo.PCX 35
STOP
:MSG1
SHOW @ 150,100 EMSMSG.PCX 1
PAUSE
IF NOXMS THEN GOTO :MSG2
GOTO :BEGIN
:MSG2
SHOW @ 150,100 XMSMSG.PCX 1
PAUSE
GOTO :BEGIN